home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Celestin Apprentice 4
/
Apprentice-Release4.iso
/
Languages
/
PowerMacOberon 1.2
/
Dialogs
/
DialogGroupBoxes.Obj
< prev
next >
Wrap
Text File
|
1995-08-14
|
8KB
|
34 lines
¯6 & ˇº ËT 67üÖòDialogGroupBoxes ÇC‹§ï Ny∞›4] Ù]ÉGetString ‹Insert §SetString ]Ñ Ö7ûâ`DialogFrames ;‚ÜDisplay 7ûJRDialogs 6e∏uFiles ;ı‰ƒViewers 2ˆßæTexts 7û»nDialogStaticTexts ;‚WêFonts 7û»nDialogTexts ;‚WêDisplay1 7û»nGraphicUtils 2˘úfIn 2ˆÊÃOberon $Ù…/Printer 2¯"TextFrames Ü
˛Ó ˇx˛r ˛åˇˇ˚N˝¸˙< ˝” ˝˝¸Ì&˘›˘—¸˚/˚( ˚G ˙ô ˚# ˙¸˘ƒ ˙j˙ ˘◊˘≥á DialogStaticTexts String: DialogGroupBoxes Syntax10.Scn.Fnt DialogGroupBoxes Syntax10.Scn.Fnt string Syntax10.Scn.Fnt String string àø°ˇÙî!ˇ∞;· @;√ ;§ 롸|ûË @ 8~ C‡ C‡ 8} C‡ ‡ Ä! ª°ˇÙO‡ |¶ø!ˇ‰ê î!ˇx;· XêA ;√ ;§ ;Ö ;f 8~ 8ü 8ø 8fl 8ˇ Åˇ¸Äˇî| ¶ÄHˇòO‡!ÄA 3ú ©? 1Iˇ˛±_ © 1ãˇ˚±ü 8` ∞
®ü / A¯ ®ø /Ö @¸ †8{ 8Ä 8Ω 8‹ êˇ¸êüˇ¯êøˇÙêflˇ® 8Ä 9 Kˇˇ8„ ÄflˇÄøˇÙÄüˇ¯Äˇ¸|˝:êˇ¸êüˇ¯êøˇÙêflˇêˇˇÏ® 8Ä 9 Kˇ˛≈9 ġˇÏÄflˇÄøˇÙÄüˇ¯Äˇ¸} B9 ÄBˇ‰H ÄA C‡‰ û â> d,â AÊ ;@ C‡ ;@ ©_ }|R û Åû p å ®l (|ÉX û Äæ p Ö ®≈ && û à˛ t/ @˙ © ±
C‡ Tô‡ @˝ L8{ û 8û t8† @0› 8˘ ©? 1 ˇ¸ û Å> p9Z 9` ±a 89ü
ëÅ <ÄBˇËH ÄA 8{ 8Ä 8Ω 8‹ ®ˇ |˝:9 9: ÄBˇ‰Kˇ˛ùÄA 8{ 8Ä 8Ω 8‹ 8˝ © } B9: ÄBˇ‰Kˇ˝µÄA 8{ 8Ä ©? |ΩJ8‹ ©_ |˝R© } Z9: ÄBˇ‰Kˇ˝âÄA 8{ 8Ä 8Ω 0‹ˇˇ©ü |˝b1 ˇˇ9: ÄBˇ‰Kˇ˝UÄA 8{ 8Ä 0Ω 0‹ 0˝ © } B9: ÄBˇ‰Kˇ˝)ÄA 8{ 8Ä ©? }]J0™ 8‹ © }ùZ0Ï © } B9: ÄBˇ‰Kˇ¸˝ÄA ©?
,â @Â 8{ 8Ä 8Ω ©_ |‹R©
|˝Z©ü } b9: ÄBˇ‰Kˇ¸¡ÄA 8{ 8Ä ®ø |›*®ˇ
|ß0© |‹B©? |˝J©_ } R9: ÄBˇ‰Kˇ¸ÅÄA 8{ 8Ä 0Ω © }úZ0Ãˇˇ®ˇ
|˝:© }<B1 ˇˇ9: ÄBˇ‰Kˇ¸AÄA 8{ 8Ä ©_ }}R©ü
|¨X®fl |¸20«ˇˇ© }=B0Èˇˇ©_ }|R1 ˇˇ9: ÄBˇ‰Kˇ¸ÄA Ä 8Ä! |¶ª!ˇ‰O‡ |¶øAˇËê î!ˇ†;· 8êA ;√ ;§ ;Ö 8~ 8ü 8ø 8fl 8ˇ Åɡ¸Ä ˇå| ¶ÄLˇêO‡!ÄA ® 0ɡ˛∞ü ®ø 0≈ˇ˚∞fl ®ˇ / @¯ C‡h8} 8ú © |ΩB8‹ ÄBˇÙH ÄA 8} 8ú 8Ω ©? |‹JÄBˇÙKˇ˚ÄA ©_ |}R8ú © |ΩZ©ü |‹bÄBˇÙKˇ˙ÌÄA û Ä~ p É û Äû p Ñ ®£ (®ƒ &|Â2Åˇ»Å( }GI÷Åbˇ»Åã å Jb◊@‡ 3Zˇˇ® |úz õ‡ @˝ < û 8~ t8Ä @0Ω 8€ ®ˇ 0Áˇ¸ û Å p9 9_
ÄBˇËH ÄA ©
,à @Â `8} ©? |úJ©_
|ΩR© |‹ZÄBˇÙKˇ˙≈ÄA ©ü |}b®ü
|d®ø |ú*®fl |Ω2®ˇ |‹:ÄBˇÙKˇ˘˝ÄA Ä 0Ä! |¶ªAˇËO‡ |¶øÅˇê î!ˇ∞;· 8êA ;√ ;§ ;Ä Å / @˙ Äbˇ¸ÄBˇºH ÄA ;É ìù C‡ Å= ÅIˇ¸Åbˇ¸ÅäˇÙlXÉù 8~ 8ù Ä¢ˇ»Ä≈ˇ¯Äˇ¨| ¶ÄFˇ∞O‡!ÄA ú û IJ pê¸ p ú û 9@ @}I¶9| t9û tâ 8 B@ P/à A˛ Hç, ô B@ 4/â A˛ ,ç ù+ B@ /à A˛ ç, ù B@ /à @˛ˇ‹ò C‡ ò Ä Ä! |¶ªÅˇO‡ |¶øÅˇê î!ˇò;· 8êA ;√ ;Ñ ;• 8~ 8ú 8Ω Ä¬ˇ»ÄÊˇ¯ÄˇT| ¶ÄGˇXO‡!ÄA 8| 8ù 8ø 8¿ ÄBˇÃH ÄA û 8 8Ä ÄBˇ‹H ÄA ê~ p8| 8ù û 8æ t8¿ @ÄBˇÃKˇ¯-ÄA Ä 8Ä! |¶ªÅˇO‡ |¶øÅˇê î!ˇ∏;· 8êA ;√ ;Ñ ;• 8~ 8ú 8Ω Åˇ»Å(ˇ¯Ä ˇ | ¶ÄIˇO‡!ÄA 8| 8ù û Äæ p Ö 8¿ ÄBˇÃH ÄA 8| 8ù û 8æ t8¿ @ÄBˇÃKˇ˜mÄA Ä Ä! |¶ªÅˇO‡ |¶ø°ˇÙê î!ˇ∏;· 8êA ;√ ;§ 8~ ÅCˇ¸Ä
ˇ|| ¶ÄJˇÄO‡!ÄA û ìæ p8~ Åcˇ¸Ä ˇ<| ¶ÄKˇ@O‡!ÄA û Åû h,å AÊ $ û Ä~ hÄɡ¸Äˇ\| ¶ÄDˇ`O‡!ÄA Ä Ä! |¶ª°ˇÙO‡ |¶øÅˇê î!ˇ∏;· 8êA ;√ ;• Ä° 0› T« 8|'ê° êA ;Å 8TË˲} ¶9$ˇ¸9A 4Öi Öâ ïj ïä B ˇ8~ Äɡ¸Äˇ|| ¶ÄDˇÄO‡!ÄA û 8‡ @|ȶ9 t9< à© 8 B@ P/ A˙ Hå… ò® B@ 4/ A˙ ,å© ú» B@ / A˙ å… ú® B@ / @˙ˇ‹ò C‡ ò 8~ ÅCˇ¸Ä
ˇ<| ¶ÄJˇ@O‡!ÄA û Å~ h/ã A˛ $ û Ä~ hÅɡ¸Ä ˇ\| ¶ÄLˇ`O‡!ÄA Ä Ä! |¶ªÅˇO‡ |¶øaˇÏê î!ˇò;· HêA ;√ ;§ ;e ;Ü 8 ê 8~ 8ù 8ª 8‹ Ä‚ˇ»Åˇ¯ÄˇÑ| ¶ÄHˇàO‡!ÄA Å=ˇ¸ÅBˇ¿Åjˇ¸ÅâˇÙ|åX @Ê$ÄbˇÄɡ‰ÄºˇÙ @˙®€ /Ü @˛ –Ä˚ = @ |á@ @Ê º û â> $/ A˙ ¨ û 8~ D8Ä û Äæ h8fl ÅBˇ‡Ä
| ¶ÄJ $O‡!ÄA 8~ 8ù êˇ¸êüˇ¯®{ ®õ ÄBˇ–H ÄA 8£ Äüˇ¯Äˇ¸êˇ¸êüˇ¯êøˇÙ8bˇ∏8Ä ÄBˇ¯H ÄA 8√ ÄøˇÙÄüˇ¯Äˇ¸Åcˇ¸Ä ˇ¥| ¶ÄKˇ∏O‡!ÄA C‡ 8Åǡ8l ,ÄǡÄÑˇËÄ¢ˇ8• ĬˇÄΔˇÏ®˚ © ÄBˇH ÄA Ä (Ä! |¶ªaˇÏO‡ |¶øAˇËê î!ˇ®;· 8êA ;√ ;§ ;Ü Ä· 1 U 8|)ê· êA ;a 8U*˲}I¶9eˇ¸9Å 4Ñk Ñã îl îå B ˇ;@ 8~ Ä£ˇ¸Ä˛Ù| ¶ÄE˛¯O‡!ÄA ;C 8b Ĭˇ‘Äܡ–8‹ 8ª ÄBˇ‘H ÄA 8z ÄÇ ÄBˇ‘H ÄA Ä (Ä! |¶ªAˇËO‡ |¶øˇ‡ê î!ˇà;· 8êA ;√ ;† ;Ä ;` ;@ ; ; ì 8~ Ä‚ˇ»Åˇ¯Äˇú| ¶ÄHˇ†O‡!ÄA Å"ˇ»ÅI ë_ Åbˇ‡Äkˇ¸ÄBˇºKˇ˘uÄA ;c 8{ Åɡ¸Ä ˇt| ¶ÄLˇxO‡!ÄA 8{ 8ǡ∞8† Ä√ˇ¸Äˇ | ¶ÄFˇ O‡!ÄA 8{ 8Ä ı8†ˇ‚8¿ å8‡ 9 Å#ˇ¸Ä ˇ$| ¶ÄIˇ(O‡!ÄA Ä 8õ 8† ÅCˇ¸Ä
ˇl| ¶ÄJˇpO‡!ÄA Åbˇ»©ã /å A˛ ‡ ÄbˇÿÄcˇ¸ÄBˇºKˇÚYÄA ;C 8z Äɡ¸Äˇt| ¶ÄDˇxO‡!ÄA 8z 8Ä ƒ8†ˇ‚8¿ (8‡ 9 Å#ˇ¸Ä ˇ$| ¶ÄIˇ(O‡!ÄA 8z 8ǡ®8† ÅCˇ¸Ä
˛‰| ¶ÄJ˛ËO‡!ÄA 8bˇî8Ä ÄBˇ‹Kˇ¯ÄA ; 8z 8ò Åcˇ¸Ä ˛Ï| ¶ÄK˛O‡!ÄA Ä 8ö 8† Åɡ¸Ä ˇl| ¶ÄLˇpO‡!ÄA Äbˇ»®É ,Ñ AÊ ‡ 8{ 8ü û 8æ t8¿ @Kˇ˝8{ Ä£ˇ¸Ä˛Ù| ¶ÄE˛¯O‡!ÄA ;# 8y 8Ä ô Äπ <¿Ä û IJ p9 9 ÄBˇ‘H ÄA Ä HÄ! |¶ªˇ‡O‡ |¶øAˇËê î!ˇ0;· 8êA ;√ ;§ ;Ä ;` ì (ì ì ì 8~ 8ù Ĭˇ»ÄÊˇ¯Ä˛¸| ¶ÄGˇ O‡!ÄA 8} 8ǡå8† Åˇ¸ÄˇL| ¶ÄHˇPO‡!ÄA ;É Å<ˇ¸ÅBˇ‡Åjˇ¸ÅâˇÙlX8| Äɡ¸Ä˛Ù| ¶ÄD˛¯O‡!ÄA ;c 8 Ä¢ˇ‘ÄÖˇÿ8ª 8¿ ÄBˇ‘H ÄA 8 Ĭˇ‘Äܡÿ8ø 4ÄBˇ‘H ÄA ;@ ġ / A˙ 8 û Å Å> pàH A˛ $8~ Äü ÅCˇ¸Ä
˛Ï| ¶ÄJ˛O‡!ÄA â !ã ,å AÊ 8 ∫ @|“àü 4òÉ 83Z 8 Ä¢ˇ‘ÄÖˇÿ8ø 4ÄBˇ‘KˇÔEÄA C‡ˇ¿ ∫ @|fl“8‡ òÊ 8 û 9 }¶9? 89^ t8 } +}j*A‚ X@0 @˙ C‡ˇË|¶ T 8}0}k0X@A˙ (8~ 8ü 88† @Åɡ¸Ä ˛‰| ¶ÄL˛ËO‡!ÄA Ä †Ä! |¶ªAˇËO‡ |¶øAˇËê î!ˇ†;· 8êA ;√ ;Ñ ;• ;f ;@ û É^ h8~ 8ü 8ø 8fl 8ˇ
Åˇ¸Äˇî| ¶ÄHˇòO‡!ÄA 8z ®ü ®ø ®fl ®ˇ
9= 9 9[ Åcˇ¸Ä ˇt| ¶ÄKˇxO‡!ÄA Ä 0Ä! |¶ªAˇËO‡ |¶ø¡ˇ¯ê î!ˇ0;· @êA ;¿ ìfl tìfl hìfl `ìfl Xìfl Äbˇ¸ÄBˇºKˇÒôÄA ;√ 8 8ü 8ø ÄBˇ¿H ÄA Åü /å A˛<8~ Äɡ¸Äˇt| ¶ÄDˇxO‡!ÄA ÄBˇÏH ÄA 8 TÄ¢ˇ‘ÄÖˇÿĬˇÄ¶ d Ö Ä• 8¿ ÄBˇ‘KˇÔaÄA 8 TÄ‚ˇ‘Äáˇÿ8ø ÄÄBˇ‘KˇÓ¡ÄA 8 8Ä @ÄBˇÏH ÄA ÅˇÏâ( !I ,ä AÊ àbˇàò ÄBˇÏKˇÏÈÄA C‡ û Äü Xêû p8~ 8ü 8† @Ä√ˇ¸Äˇ | ¶ÄFˇ O‡!ÄA 8 ÄBˇÏH ÄA 8 ÄBˇÏKˇÏ!ÄA 8 ÄBˇÏKˇÏÄA 8
ÄBˇÏKˇÏÄA Ä‚ˇÏâ !( / A˙ (©_ ±_ © ± 9Ä d±ü 8` d∞
C‡ ,®ü /Ñ @¸ 8† d∞ø ®fl
,Ü @‰ 8‡ d∞ˇ
8~ ®ü ®ø ®fl ®ˇ
9 Å#ˇ¸Ä ˇ$| ¶ÄIˇ(O‡!ÄA 8~ 8ü 8† @ÅCˇ¸Ä
˛‰| ¶ÄJ˛ËO‡!ÄA 8~ êˇ¸8bˇt8Ä ÄBˇ‹KˇÒÄA 8É Äˇ¸Åcˇ¸Ä ˛Ï| ¶ÄK˛O‡!ÄA Ä 8û 8† Åɡ¸Ä ˇl| ¶ÄLˇpO‡!ÄA C‡ 8` Äǡ»∞d Ä¢ˇ»®≈ / A˙ 8bˇ`8Ä ÄBˇ»H ÄA Ä òÄ! |¶ª¡ˇ¯O‡ |¶ø¡ˇ¯ê î!ˇh;· @êA 8 ê ê ÄBˇÏKˇÏeÄA 8 HÄBˇÏH ÄA ;¿ Ä‚ˇÏâ /à A˛ $â? H,â @Ê 8 HÄBˇÏKˇÍUÄA C‡ˇ‘ÅBˇÏâj !ã / A˙ 8` Äǡ»∞d C‡0Ä¢ˇÏà≈ /Ü A˛ Làˇ H,á AÊ @â H/ ~A˙ 4/û ?@¸ , æ @}?Úâ_ HôI 3fi 8 HÄBˇÏKˇÍ%ÄA C‡ˇ¨ æ @}Ú9Ä ôã 8 8ü ÄBˇ¿H ÄA Äbˇ»®É ,Ñ @Ê §Äø Ä≈ˇ¸Ä‚ˇ¸ÅˇÙ8 @˙ åÅ? ÅIˇ¸Åbˇ¸ÅäˇÙlXÄ 8ü 8† @Ä√ˇ¸Ä˛‰| ¶ÄF˛ËO‡!ÄA ġ Åˇ¸Å"ˇ¸ÅHˇÙjHÄ êˇ¸8bˇL8Ä ÄBˇ‹KˇÎ!ÄA 8É Äˇ¸Åcˇ¸Ä ˛Ï| ¶ÄK˛O‡!ÄA Åǡ»®l /É A˛ 8bˇ88Ä ÄBˇ»KˇÍ©ÄA Ä `Ä! |¶ª¡ˇ¯O‡ |¶ø·ˇ¸ê î!ˇx;· 8êA 8 ê ê 8 8ü ÄBˇ¿KˇÈÅÄA Äǡ»®§ ,Ö @Ê Äfl ÄÊˇ¸Åˇ¸Å'ˇÙ @ @˙ ¸Å_ Åjˇ¸Åǡ¸ÄkˇÙc`Äü Ñ 8‡ @|ȶ9 å§ t8 B@ P/Ö A˛ Håƒ ò® B@ 4/Ü A˛ ,å§ ú» B@ /Ö A˛ åƒ ú® B@ /Ö @˛ˇ‹ò C‡ ò 8b Å"ˇ‘Ä⡖8¢ˇ08¿ ÄBˇ‘KˇÚ˘ÄA 8b ÅBˇ‘Ä䡖8ø 8¿ @ÄBˇ‘KˇÁïÄA 8b Åbˇ‘Äãˇ–ÄBˇ‘H ÄA ÅǡÄl `ÄÇ ÄBˇ‘KˇÚÂÄA C‡ 8` Äǡ»∞d Ä¢ˇ»®≈ ,Ü AÊ 8bˇ 8Ä ÄBˇ»KˇË≠ÄA Ä XÄ! |¶ª·ˇ¸O‡ |¶ø·ˇ¸ê î!ˇ¿;· 8êA 8b Ä‚ˇ‘ÄᡖÄBˇ‘H ÄA Ä Ä! |¶ª·ˇ¸O‡ â ¥ˇ¸ ˇ¯ ItemDesc
h pä \ e g j l o y Ä Q S T V _ h o ¨ ∑ ∏ ª º ˜ " ) C L P | ü £ Ÿ › ‡ ñ ‘ ◊ Â Ë 5 F S W Ñ Õ Í è ô ∞ æ ¯ ˙ 㯿 Max ·{x ‚{y ¯ô0ÿ Item.Draw
cx ‰{f ·{g gx gy h Â{mode w ‚{x „{y Ê{yh ¯ï(8 Item.Print
cx Â{fnth ·{g gx gy h w ‚{x „{y ‰{yh ¯›8 Item.Copy ‚{dup ·{g „{x ¯ã08 Item.Load fntname ·{g ¯¥8 Item.Store ·{g ¯›8 Item.SetFont ‚{fnt ·{g ¯∞8 Item.SetString ·{g ¯ö » Item.Handle ‚{f ·{g t ¯Œ 8 WriteToObjectStr ·{o ‚{p Â{t ¯Ù¿ 8 Item.Edit Á{fnt ·{g ‚{on „{os p Â{s ‰{string Ê{t1 ¯˘ò8 Item.Update 4ch ·{g Â{i „{os ‚{p ‰{t1 ¯§ (8 Item.GetObjects ·{g
h ‰{nofelems Â{p w x y ¯›
ê¿ Insert Äch ·{g
h p w x x1 y y1 ¯‹ ÿ ¿ SetString » ch ·{i o p ¯√ – 8 GetString o p ¯‘ 8 $$
